home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Visual Basic Toolbox
/
Visual Basic Toolbox (P.I.E.)(1996).ISO
/
pgm_ctrl
/
cuactrls
/
cradio.frm
< prev
next >
Wrap
Text File
|
1995-05-22
|
3KB
|
98 lines
VERSION 2.00
Begin Form frmRadio
BackColor = &H00C0C0C0&
BorderStyle = 3 'Fixed Double
Caption = "Radio Button Demo"
ClientHeight = 2100
ClientLeft = 1110
ClientTop = 3795
ClientWidth = 5265
ClipControls = 0 'False
Height = 2505
Left = 1050
LinkTopic = "Form1"
ScaleHeight = 2100
ScaleWidth = 5265
Top = 3450
Width = 5385
Begin CUAFrame grp4
BackColor = &H00C0C0C0&
BorderStyle = 7 'Inset single
Caption = "&Window Control"
Height = 735
Left = 150
TabIndex = 2
Top = 1230
Width = 3525
Begin CUARadio optWindowControl
BackColor = &H00C0C0C0&
Caption = "Minimize window"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 285
Index = 0
Left = 135
TabIndex = 4
Top = 315
Value = -1 'True
Width = 1680
End
Begin CUARadio optWindowControl
BackColor = &H00C0C0C0&
Caption = "Hide window"
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 285
Index = 1
Left = 1890
TabIndex = 3
TabStop = 0 'False
Top = 315
Width = 1545
End
End
Begin CUACommand cmdOK
Cancel = -1 'True
Caption = "OK"
Default = -1 'True
Height = 345
Left = 3825
StandardButton = 1 'OK
TabIndex = 0
Top = 135
Width = 1260
End
Begin CUALabel lbl
BackColor = &H00C0C0C0&
BackStyle = 1 'Opaque
Caption = "Check Buttons in CUA/Controls have the same functionality as the standard component. They can also be bound to a data base, and support 3D-effects."
FontBold = 0 'False
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 8.25
FontStrikethru = 0 'False
FontUnderline = 0 'False
ForeColor = &H00000000&
Height = 1140
Index = 6
Left = 165
TabIndex = 1
Top = 165
Width = 3525
End
End
Option Explicit
Sub cmdOK_Click ()
Unload Me
End Sub